package ar.edu.caece.compiler.grammar.factories;

import ar.edu.caece.compiler.grammar.AbstractTokenVisitorFactory;
import ar.edu.caece.compiler.grammar.Recognizer;
import ar.edu.caece.compiler.grammar.TokenRecognizer;
import ar.edu.caece.compiler.grammar.TokenVisitor;
import ar.edu.caece.compiler.grammar.attributes.Attribute;
import ar.edu.caece.compiler.grammar.attributes.Attribute.Operacion;
import ar.edu.caece.compiler.grammar.attributes.Attribute.Type;
import ar.edu.caece.compiler.grammar.attributes.AttributeUtils;
import ar.edu.caece.compiler.grammar.attributes.StringAttribute;
import ar.edu.caece.compiler.grammar.attributes.tree.NodeExpr;
import ar.edu.caece.compiler.grammar.attributes.tree.NodeOperacion;
import ar.edu.caece.compiler.grammar.nonterminals.EXPR2;
import ar.edu.caece.compiler.grammar.nonterminals.EXPRA;
import ar.edu.caece.compiler.grammar.nonterminals.EXPRA1;
import ar.edu.caece.compiler.grammar.nonterminals.OP1;

public class EXPRA1Factory extends AbstractTokenVisitorFactory {

	private static EXPRA1Factory INSTANCE;
	
	private OP1Factory op1Factory;
	private EXPR2Factory expr2Factory;
	private EXPRAFactory expraFactory;
	private TokenVisitor parseOP1;
	private TokenVisitor parseEXPR2;
	private TokenVisitor parseEXPRA;
	
	public static EXPRA1Factory getInstance() throws Exception {
		if(INSTANCE==null) INSTANCE = new EXPRA1Factory();
		return INSTANCE;
	}
	
	private Initializer initializer = new Initializer() {
		
		@Override
		public void init() throws Exception {
			initializer = NoOperationInitializer.getInstance();
			op1Factory = OP1Factory.getInstance();
			expr2Factory = EXPR2Factory.getInstance();
			expraFactory = EXPRAFactory.getInstance();
			parseEXPRA  = expraFactory.makeVisitor();
			parseEXPR2 = expr2Factory.makeVisitor();
			parseOP1 = op1Factory.makeVisitor();
		}
	};
	
	private EXPRA1Factory() throws Exception {

	}
	
	@Override
	public TokenVisitor makeChainedVisitor(
			final TokenVisitor siguiente) throws Exception {
		initializer.init();

		return new TokenVisitor() {

			@Override
			public Recognizer defaultCase(TokenRecognizer llamador)
					throws Exception {
				TokenVisitor opVisitor = op1Factory.makeChainedVisitor(siguiente);
				opVisitor.setInheretedAttributes(getAttributes());
				Recognizer result = llamador.execute(opVisitor);
				if(result instanceof OP1) {
					
					parseEXPR2.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));
					parseEXPRA.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));

					String tipo = "";
					
					OP1 op1 = (OP1) result;
					
					NodeExpr attribute = (NodeExpr) getAttribute(Attribute.ARBOL_HEREDADO);
					
					EXPR2 expr2 = (EXPR2) nextToken().execute(parseEXPR2);
					
					
					
					parseEXPRA.addInheritedAttribute(Attribute.ARBOL_HEREDADO, new NodeOperacion(Type.valueOf(op1.getAttribute("tipo").toString()),Operacion.valueOf(op1.getAttribute(Attribute.OPERACION).toString()),attribute,(NodeExpr) expr2.getAttribute(Attribute.ARBOL_SINTETIZADO)));
					
					EXPRA expra = (EXPRA) nextToken().execute(parseEXPRA);
					
					if( "NINGUNO".contentEquals(((StringAttribute) expra.getAttribute("tipo")).getValue())) {
						if(op1.getAttribute("tipo").equals(expr2.getAttribute("tipo"))) {
							tipo = op1.getAttribute("tipo").toString();
						} else {
							//TODO ERROR
							AttributeUtils.error("Error. Tipos de expresiones no coinciden",llamador);
						}
					} else {
						if(expra.getAttribute("tipo").equals(expr2.getAttribute("tipo")) && expr2.getAttribute("tipo").equals(op1.getAttribute("tipo")) ) {
							tipo = op1.getAttribute("tipo").toString();
						} else {
							//TODO ERROR
							AttributeUtils.error("Error. Tipos de expresiones no coinciden",llamador);
						}
					}
					
					
					EXPRA1 expra1 = new EXPRA1 (op1, expr2,expra);
					expra1.addAttribute("tipo", new StringAttribute(tipo));

					expra1.addAttribute(Attribute.ARBOL_SINTETIZADO, expra.getAttribute(Attribute.ARBOL_SINTETIZADO));

					
					return expra1;			
					} 
				else {
					return result;
				}
			}
			
		};
	
	}
	@Override
	public TokenVisitor makeVisitor() throws Exception {
		initializer.init();

		return new TokenVisitor() {

			@Override
			public Recognizer defaultCase(TokenRecognizer llamador) throws Exception {
				
				parseEXPR2.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));
				parseEXPRA.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));

				String tipo = "";
				
				OP1 op1 = (OP1) llamador.execute(parseOP1);
				
				NodeExpr attribute = (NodeExpr) getAttribute(Attribute.ARBOL_HEREDADO);

				
				EXPR2 expr2 = (EXPR2) nextToken().execute(parseEXPR2);
				
					
				parseEXPRA.addInheritedAttribute(Attribute.ARBOL_HEREDADO, new NodeOperacion(Type.valueOf(op1.getAttribute("tipo").toString()),Operacion.valueOf(op1.getAttribute(Attribute.OPERACION).toString()),attribute,(NodeExpr) expr2.getAttribute(Attribute.ARBOL_SINTETIZADO)));
				
				
				EXPRA expra = (EXPRA) nextToken().execute(parseEXPRA);
				
				if( "NINGUNO".contentEquals(((StringAttribute) expra.getAttribute("tipo")).getValue())) {
					if(op1.getAttribute("tipo").equals(expr2.getAttribute("tipo"))) {
						tipo = op1.getAttribute("tipo").toString();
					} else {
						//TODO ERROR
						AttributeUtils.error("Error. Tipos de expresiones no coinciden",llamador);
					}
				} else {
					if(expra.getAttribute("tipo").equals(expr2.getAttribute("tipo")) && expr2.getAttribute("tipo").equals(op1.getAttribute("tipo")) ) {
						tipo = op1.getAttribute("tipo").toString();
					} else {
						//TODO ERROR
						AttributeUtils.error("Error. Tipos de expresiones no coinciden",llamador);
					}
				}
				
				
				EXPRA1 expra1 = new EXPRA1 (op1, expr2,expra);
				expra1.addAttribute("tipo", new StringAttribute(tipo));

				expra1.addAttribute(Attribute.ARBOL_SINTETIZADO, expra.getAttribute(Attribute.ARBOL_SINTETIZADO));
				
				return expra1;
			}
		};
	}
	
}
